'lstrcpy is used to get string value given a pointer to the string
Declare Function lstrcpy Lib "Kernel" (ByVal lpString1 As Any, ByVal lpString2 As Any) As Long
'EZDialup function declarations
Declare Sub StartSession Lib "appdial.dll" (ByVal CmdLine As String, ByVal AppHandle As Integer)
Declare Sub AbortSession Lib "appdial.dll" ()
Declare Sub ChangePhoneNumber Lib "appdial.dll" ()
Declare Sub StopEZDialup Lib "appdial.dll" ()
Declare Sub SetDialingSequence Lib "appdial.dll" (ByVal DialStr As String)
Declare Sub SetDialupCommPort Lib "appdial.dll" (ByVal PortStr As String)
Declare Sub SetDialupCommConfig Lib "appdial.dll" (ByVal CfgStr As String)
Declare Sub SetModemInit1 Lib "appdial.dll" (ByVal InitStr As String)
Declare Sub SetModemInit2 Lib "appdial.dll" (ByVal InitStr As String)
Declare Sub SetDownloadBlockSize Lib "appdial.dll" (ByVal Size As Integer)
Declare Sub SetUploadBlockSize Lib "appdial.dll" (ByVal Size As Integer)
Declare Sub SetLinkUserPath Lib "appdial.dll" (ByVal Path As String)
Declare Sub SetLinkUserPassword Lib "appdial.dll" (ByVal Password As String)
Declare Sub SetExecutablePath Lib "appdial.dll" (ByVal Path As String)
Declare Sub EstablishDialupLink Lib "appdial.dll" ()
Declare Function StartDownload Lib "appdial.dll" (ByVal ServerSource as String, ByVal ClientTarget as String) As Integer
Declare Function StartUpload Lib "appdial.dll" (ByVal ClientSource as String, ByVal ServerTarget as String) As Integer
Declare Function StartMoveDown Lib "appdial.dll" (ByVal ServerSource as String, ByVal ClientTarget as String) As Integer
Declare Function StartMoveUp Lib "appdial.dll" (ByVal ClientSource as String, ByVal ServerTarget as String) As Integer
Declare Function UnzipServerFile Lib "appdial.dll" (ByVal ZipFilePath as String, ByVal TargetServerDirectory as String) As Integer
Declare Function UnzipClientFile Lib "appdial.dll" (ByVal ZipFilePath as String, ByVal TargetClientDirectory as String) As Integer
Declare Function ZipServerFile Lib "appdial.dll" (ByVal TargetZipFilePath as String, ByVal SourcePathAndFileMask as String) As Integer
Declare Function ZipClientFile Lib "appdial.dll" (ByVal TargetZipFilePath as String, ByVal SourcePathAndFileMask as String) As Integer
Declare Function DeleteFilesOnServer Lib "appdial.dll" (ByVal SourcePathAndFileMask as String) As Integer
Declare Function DeleteFilesOnClient Lib "appdial.dll" (ByVal SourcePathAndFileMask as String) As Integer
Declare Function RunProgramOnServer Lib "appdial.dll" (ByVal ProgramPath as String) As Integer
Declare Function RunProgramOnClient Lib "appdial.dll" (ByVal ProgramPath as String) As Integer
Declare Function LaunchProgramOnServer Lib "appdial.dll" (ByVal ProgramPath as String) As Integer
Declare Function LaunchProgramOnClient Lib "appdial.dll" (ByVal ProgramPath as String) As Integer
Declare Function UpdateClientDirectory Lib "appdial.dll" (ByVal ClientDirectory as String, ByVal ServerDirectory as String, ByVal ClientDateFilePath as String) As Integer
Declare Function EZMailUpdate Lib "appdial.dll" (ByVal ServerMailboxPath as String, ByVal ServerDirectory as String, ByVal ClientMailboxPath as String) As Integer
Declare Sub EstablishLinkAsTerminal Lib "appdial.dll" ()
Declare Function SerialIOWaiting Lib "appdial.dll" () As Integer
Declare Function GetSerialByte Lib "appdial.dll" () As Integer
Declare Function SendSerialByte Lib "appdial.dll" (ByVal iChar As Integer) As Integer
Declare Function SendSerialString Lib "appdial.dll" (ByVal sData As String) As Integer
Declare Function SetupNotification Lib "appdial.dll" (ByVal sWaitFor As String, ByVal sRespondWith As String, ByVal iIndex As Integer, ByVal iMessageID As Integer) As Integer
Declare Sub DisableAllNotifications Lib "appdial.dll" ()
Declare Sub ReEnableAllNotifications Lib "appdial.dll" ()
Declare Sub StartTerminalDownload Lib "appdial.dll" ((ByVal sFilePath as string, iProtocolCode as integer)
Declare Sub StartTerminalUpload Lib "appdial.dll" (ByVal sFilePath as string, ByVal iProtocolCode as integer)
Declare Sub InterruptFileTransfer Lib "appdial.dll" ()
Declare Sub EstablishCommPortLink Lib "appdial.dll" ()
Declare Sub SupplyRegistrationCodes Lib "appdial.dll" (ByVal Code1 as string, ByVal Code2 as string)